home *** CD-ROM | disk | FTP | other *** search
/ Aminet 38 / Aminet 38 (2000)(Schatztruhe)[!][Aug 2000].iso / Aminet / docs / help / arexxbegin.lha / ARexx_For_Beginners / Articles_01-10 / Example10-13.rexx < prev    next >
Encoding:
OS/2 REXX Batch file  |  1995-04-06  |  135 b   |  11 lines
  1. /* Example10-13 */
  2.  
  3. SAY 'The 5 times table'
  4.  
  5. x = 1
  6. DO FOREVER
  7.    SAY 'Five times' x '=' x * 5
  8.    x = x + 1
  9.    IF x > 10 THEN LEAVE
  10. END
  11.